clear all;

cd ..; cd ..; cd ..;
load('code_main_model\6_implied_w_r\computation_results\data.mat','GDP','d');
cd 'code_figure_table\OA\Figure OA10';

mkt_bank=find(d(1,:)==0);
mkt_unbank=find(d(1,:)>0);

GDP_agg=sum(GDP,2);
GDP_agg_bank=sum(GDP(:,mkt_bank),2);
GDP_agg_unbank=sum(GDP(:,mkt_unbank),2);

g_GDP_bank(1:11)=0;
g_GDP_unbank(1:11)=0;

for i=1:11
    g_GDP_bank(i)=(GDP_agg_bank(i)-GDP_agg_bank(1))/GDP_agg(1);
    g_GDP_unbank(i)=(GDP_agg_unbank(i)-GDP_agg_unbank(1))/GDP_agg(1);
end

save('PC.mat','g_GDP_bank','g_GDP_unbank')